object CreateNewDirDlg: TCreateNewDirDlg
  Left = 168
  Top = 137
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Create new directory...'
  ClientHeight = 107
  ClientWidth = 314
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 8
    Top = 8
    Width = 297
    Height = 65
    ParentShowHint = False
    Shape = bsFrame
    ShowHint = False
    Style = bsRaised
  end
  object Label1: TLabel
    Left = 19
    Top = 18
    Width = 120
    Height = 16
    Caption = 'What should I call it?'
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object OKBtn: TButton
    Left = 79
    Top = 80
    Width = 75
    Height = 24
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 0
  end
  object CancelBtn: TButton
    Left = 159
    Top = 80
    Width = 75
    Height = 24
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 1
  end
  object NewDir: TEdit
    Left = 20
    Top = 36
    Width = 273
    Height = 21
    TabOrder = 2
  end
end